(define-minor-mode): Don't use symbol-value with constant argument.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1fbbcdef984ab1c9c7892e56c6e882b1196c0c7d..4ae65f7feed171e5bd2ae7844150a95edaa7053a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2009-08-30  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * emacs-lisp/easy-mmode.el (define-minor-mode): Don't use symbol-value
+       with constant argument.
+
        * emacs-lisp/debug.el (debugger-setup-buffer): Make it multibyte.
 
        * emacs-lisp/cl.el (cl-macro-environment): Don't define it here.

diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 91dc673f26c5152efba421ac2138dbec50559b54..b625cb87c0bb07604fef60166aeffd24fe10c519 100644 (file)
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -263,8 +263,7 @@ With zero or negative ARG turn mode off.
 
        (add-minor-mode ',mode ',lighter
                       ,(if keymap keymap-sym
-                         `(if (boundp ',keymap-sym)
-                              (symbol-value ',keymap-sym)))))))
+                         `(if (boundp ',keymap-sym) ,keymap-sym))))))
 \f
 ;;;
 ;;; make global minor mode